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ABOUT THIS CHAPTER 


This chapter contains the minimum information you'll need about memory 
management on the Macintosh. Memory management is covered in greater detail in 
the Memory Manager section. 
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THE STACK AND THE HEAP 


A running program can dynamically allocate and release memory in two places: 

the stack or the heap. The stack is an area of memory that can grow or shrink at 
one end while the other end remains fixed, as shown in Figure 1. This means that 
Space on the stack is always allocated and released in LIFO (last-in- first-out) 
order: The last item allocated is always the first to be released. It also 
means that the allocated area of the stack is always contiguous. Space is 
released only at the top of the stack, never in the middle, so there can never 
be any unallocated "holes" in the stack. 
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Figure 1-The Stack 
Figure 1—The Stack 


By convention, the stack grows from high toward low memory addresses. The end of 
the stack that grows and shrinks is usually referred to as the "top" of the 
stack, even though it's actually at the lower end of the stack in memory. 


When programs in high-level languages declare static variables (such as with the 
Pascal VAR declaration), those variables are allocated on the stack. 


The other method of dynamic memory allocation is from the heap. Heap space is 
allocated and released only at the program's explicit request, through calls to 
the Memory Manager. 


Space in the heap is allocated in blocks, which may be of any size needed for a 
particular object. The Memory Manager does all the necessary "housekeeping" to 
keep track of the blocks as they're allocated and released. Because these 
Operations can occur in any order, the heap doesn't grow and shrink in an 
orderly way like the stack. After a program has been running for a while, the 
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heap tends to become fragmented into a patchwork of allocated and free blocks, 
as shown in Figure 2. 
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Figure 2-—Frazmented Heap 
Figure 2-A Fragmented Heap 


As a result of heap fragmentation, when the program asks to allocate a new block 
of a certain size, it may be impossible to satisfy the request even though 
there's enough free space available, because the space is broken up into blocks 
smaller than the requested size. When this happens, the Memory Manager will try 
to create the needed space by compacting the heap: moving allocated blocks 
together in order to collect the free space into a single larger block 

(see Figure 3). 
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Figure 3-Heap Compaction 
Figure 3—Heap Compaction 
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There's a system heap that's used by the Operating System and an application 
heap that's used by the Toolbox and the application program. 
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POINTERS AND HANDLES 


The Memory Manager contains a few fundamental routines for allocating and 
releasing heap space. The NewPtr function allocates a block in the heap of a 
requested size and returns a pointer to the block. You can then make as many 
copies of the pointer as you need and use them in any way your program requires. 
When you're finished with the block, you can release the memory it occupies 
(returning it to available free space) with the DisposPtr procedure. 


Once you've called DisposPtr, any pointers you may have to the block become 
invalid, since the block they're supposed to point to no longer exists. You have 
to be careful not to use such "dangling" pointers. This type of bug can be very 
difficult to diagnose and correct, since its effects typically aren't discovered 
until long after the pointer is left dangling. 


Another way a pointer can be left dangling is for its underlying block to be 
moved to a different location within the heap. To avoid this problem, blocks 
that are referred to through simple pointers, as in Figure 4, are 
nonrelocatable. The Memory Manager will never move a nonrelocatable block, so 
you can rely on all pointers to it to remain correct for as long as the block 
remains allocated. 
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Figure 4-A Pointer to a Nonrelocatable Block 
Figure 4—A Pointer to a Nonrelocatable Block 


If all blocks in the heap were nonrelocatable, there would be no way to prevent 
the heap's free space from becoming fragmented. Since the Memory Manager needs 
to be able to move blocks around in order to compact the heap, it also uses 
relocatable blocks. (All the allocated blocks shown above in Figure 3, the 
illustration of heap compaction, are relocatable.) To keep from creating 
dangling pointers, the Memory Manager maintains a single master pointer to each 
relocatable block. Whenever a relocatable block is created, a master pointer is 
allocated from the heap at the same time and set to point to the block. All 
references to the block are then made by double indirection, through a pointer 
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to the master pointer, called a handle to the block (see Figure 5). If the 
Memory Manager needs to move the block during compaction, it has only to update 
the master pointer to point to the block's new location; the master pointer 
itself is never moved. Since all copies of the handle point to this same master 
pointer, they can be relied on not to dangle, even after the block has been 
moved. 


—— Tasker pointer 
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Figure 5—-A Handle to a Relocatable Block 
Figure 5-A Handle to a Relocatable Block 


Relocatable blocks are moved only by the Memory Manager, and only at well- 
defined, predictable times. In particular, only the routines listed in Appendix 
B can cause blocks to move, and these routines can never be called from within 
an interrupt. If your program doesn't call these routines, you can rely on 
blocks not being moved. 


The NewHandle function allocates a block in the heap of a requested size and 
returns a handle to the block. You can then make as many copies of the handle as 
you need and use them in any way your program requires. When you're finished 
with the block, you can free the space it occupies with the DisposHandle 
procedure. 


Note: Toolbox routines that create new objects of various kinds, such as 
NewWindow and NewControl, implicitly call the NewPtr and NewHandle 
routines to allocate the space they need. There are also analogous 
routines for releasing these objects, such as DisposeWindow and 
DisposeControl. 


If the Memory Manager can't allocate a block of a requested size even after 
compacting the entire heap, it can try to free some space by purging blocks from 
the heap. Purging a block removes it from the heap and frees the space it 
occupies. The block's master pointer is set to NIL, but the space occupied by 
the master pointer itself remains allocated. Any handles to the block now point 
to a NIL master pointer, and are said to be empty. If your program later needs 
to refer to the purged block, it can detect that the handle has become empty and 
ask the Memory Manager to reallocate the block. This operation updates the 
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Original master pointer, so that all handles to the block are left referring 
correctly to its new location (see Figure 6). 


Warning: Reallocating a block recovers only the space it occupies, not its 
contents. Any information the block contains is lost when the block 
is purged. It's up to your program to reconstitute the block's 
contents after reallocating it. 


Relocatable and nonrelocatable are permanent properties of a block that can 
never be changed once the block is allocated. A relocatable block can also be 
locked or unlocked, purgeable or unpurgeable; your program can set and change 
these attributes as necessary. Locking a block temporarily prevents it from 
being moved, even if the heap is compacted. The block can later be unlocked, 
again allowing the Memory Manager to move it during compaction. A block can be 
purged only if it's relocatable, unlocked, and purgeable. A newly allocated 
relocatable block is initially unlocked and unpurgeable. 
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Figure 6—Purging and Reallocating a Block 
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Figure 6—Purging and Reallocating a Block 


General-Purpose Data Types 


The Memory Manager includes a number of type definitions for general-purpose 
use. For working with pointers and handles, there are the following definitions: 


TYPE SignedByte = -128..127; 
Byte = 0..255; 
Ptr = *“SignedByte; 
Handle = “Ptr; 


SignedByte stands for an arbitrary byte in memory, just to give Ptr and Handle 
something to point to. You can define a buffer of, say, bufSize untyped memory 
bytes as a PACKED ARRAY[1..bufSize] OF SignedByte. Byte is an alternative 
definition that treats byte-length data as unsigned rather than signed 
quantities. 


For working with strings, pointers to strings, and handles to strings, the 
Memory Manager includes the following definitions: 


TYPE Str255 = STRING[255]; 
StringPtr = *$tr255; 
StringHandle = “StringPtr; 


For treating procedures and functions as data objects, there's the ProcPtr data 
type: 


TYPE ProcPtr = Ptr; 
For example, after the declarations 


VAR aProcPtr: ProcPtr; 


PROCEDURE MyProc; 
BEGIN 


END; 
you can make aProcPtr point to MyProc by using Lisa Pascal's @ operator, as 
follows: 


aProcPtr := @MyProc 


With the @ operator, you can assign procedures and functions to variables of 
type ProcPtr, embed them in data structures, and pass them as arguments to other 
routines. Notice, however, that the data type ProcPtr technically points to an 
arbitrary byte (SignedByte), not an actual routine. As a result, there's no way 
in Pascal to access the underlying routine via this pointer in order to call it. 
Only routines written in assembly language (such as those in the Operating 
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System and the Toolbox) can actually call the routine designated by a pointer of 
type ProcPtr. 


Warning: You can't use the @ operator with procedures or functions 
whose declarations are nested within other routines. 


Finally, for treating long integers as fixed-point numbers, there's the 
following data type: 


TYPE Fixed = LONGINT; 


As illustrated in Figure 7, a fixed-point number is a 32-bit signed quantity 
containing an integer part in the high-order word and a fractional part in the 
low-order word. Negative numbers are the two's complement; they're formed by 
treating the fixed-point number as a long integer, inverting each bit, and 
adding 1 to the least significant bit. 
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Figure 7—Fired-Point Number 


Figure 7—Fixed-Point Number 


Type Coercion 


Because of Pascal's strong typing rules, you can't directly assign a value of 
type Ptr to a variable of some other pointer type, or pass it as a parameter of 
some other pointer type. Instead, you have to coerce the pointer from one type 
to another. For example, assume the following declarations have been made: 


TYPE Thing = RECORD 
END; 


ThingPtr = “Thing; 
ThingHandle = “*ThingPtr; 


VAR aPtr: Ptr; 
aThingPtr: ThingPtr; 
aThingHandle: ThingHandle; 


@ SpInside Macintosh * Version 1.0 * November 1989 * Apple Computer 
MACINTOSH MEMORY MANAGEMENT: AN INTRODUCTION ¢« 11 of 14 


In the Lisa Pascal statement 

aThingPtr := ThingPtr(NewPtr(SIZEOF (Thing) ) ) 
NewPtr allocates heap space for a new record of type Thing and returns a pointer 
of type Ptr, which is then coerced to type ThingPtr so it can be assigned to 
aThingPtr. The statement 

DisposPtr(Ptr(aThingPtr) ) 
disposes of the record pointed to by aThingPtr, first coercing the pointer to 
type Ptr (as required by the DisposPtr procedure). Similar calls to NewHandle 
and DisposHandle would require coercion between the data types Handle and 
ThingHandle. Given a pointer aPtr of type Ptr, you can make aThingPtr point to 
the same object as aPtr with the assignment 

aThingPtr := ThingPtr(aPtr) 
or you can refer to a field of a record of type Thing with the expression 

ThingPtr(aPtr)*. field 


In fact, you can use this same syntax to equate any two variables of the same 
length. For example: 


VAR aChar: CHAR; 
aByte: Byte; 
aByte := Byte(aChar) 


You can also use the Lisa Pascal functions ORD, ORD4, and POINTER, to coerce 
variables of different length from one type to another. For example: 


VAR anInteger: INTEGER; 
aLongInt: LONGINT; 
aPointer: Ptr; 


anInteger := ORD(aLongInt) ; {two low-order bytes only} 
anInteger := ORD(aPointer); {two low-order bytes only} 
aLongInt := ORD(anInteger) ; {packed into high-order bytes} 
aLongInt := ORD4(anInteger) ; {packed into low-order bytes} 
aLongInt := ORD(aPointer) ; 

aPointer := POINTER(anInteger) ; 

aPointer := POINTER(aLongInt) 


Assembly-language note: Of course, assembly-language programmers needn't 
bother with type coercion. 
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SUMMARY 


TYPE SignedByte = -128..127; 
Byte = 0..255; 
Ptr = *“SignedByte; 
Handle = “Ptr; 
Str255 = STRING[255]; 
StringPtr = *Str255; 
StringHandle = “StringPtr; 


ProcPtr = Ptr; 


Fixed = LONGINT 
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Further Reference: 


Memory Manager 
Technical Note #18, TextEdit Conversion Utility 


Technical Note #42, Pascal Routines Passed by Pointer 
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